

*** Syntax for analyses of time-series photo data

*** Use data file 'Time-series-data-photos.dta' with this syntax



* Table 5 Columns 5 , 6 and 7
 
  gen neg = .
  replace neg = negativity
  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog order L.gslmc female age income university if wp_right2_dichox==0 & period==2 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog order L.gslmc female age income university if wp_right2_dichox==1 & period==2 , re  
  estimates store C
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.wp_right2 order L.gslmc female age income university if period==2 , re    
  estimates store D  
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  
* Table 6 Column 2
  
  gen right2 = .
  replace right2= wp_right2
  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store G
  esttab A C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 


  
* Table A4 Row 3 
 
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & (negative==1 | negative==0) , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & (negative==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & (negative==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & (negative==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & (negative==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & (negative==1 | negative==0) , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & (negative==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & (negative==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & (negative==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & (negative==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & (negative==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & (negative==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & (negative==1 | negative==0) , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & (negative==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & (negative==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & (negative==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & (negative==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & (negative==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & (negative==1 | negative==0) , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & (threatening==1 | negative==0) , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & (threatening==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & (threatening==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & (threatening==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & (threatening==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & (threatening==1 | negative==0) , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g)
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & (threatening==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & (threatening==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & (threatening==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & (threatening==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & (threatening==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & (threatening==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & (threatening==1 | negative==0) , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & (threatening==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & (threatening==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & (threatening==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & (threatening==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & (threatening==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & (threatening==1 | negative==0) , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & (disgusting==1 | negative==0) , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & (disgusting==1 | negative==0) , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & (disgusting==1 | negative==0) , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  
* Table A6 Row 6

  replace right2= wp_right2
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= wp_right2_dicho2
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= wp_right2_dichox
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= left_right2
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= left_right2_dichox
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= ideo_right2
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  replace right2= ideo_right2_dichox
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 


  
* Table A8 Row 6

  replace right2= wp_right2
  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & wp_right2_ext==1, re   
  estimates store B 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & political_interest_dichox==1, re   
  estimates store C
  esttab  A B C , cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 , re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 , re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 , re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 , re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 , re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 , re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 , re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 , re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 , re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  

  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & wp_right2_ext==1, re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & wp_right2_ext==1, re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & wp_right2_ext==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & wp_right2_ext==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & wp_right2_ext==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & wp_right2_ext==1, re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & wp_right2_ext==1, re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & wp_right2_ext==1, re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & wp_right2_ext==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & wp_right2_ext==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & wp_right2_ext==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & wp_right2_ext==1, re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & wp_right2_ext==1, re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & wp_right2_ext==1, re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & wp_right2_ext==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & wp_right2_ext==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & wp_right2_ext==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & wp_right2_ext==1, re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & wp_right2_ext==1, re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & political_interest_dichox==1, re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & political_interest_dichox==1, re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & political_interest_dichox==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & political_interest_dichox==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & political_interest_dichox==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & political_interest_dichox==1, re   
  estimates store F 
  esttab G A C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & political_interest_dichox==1, re  
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & political_interest_dichox==1, re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & political_interest_dichox==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & political_interest_dichox==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & political_interest_dichox==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & political_interest_dichox==1, re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & political_interest_dichox==1, re  
  estimates store G
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & political_interest_dichox==1, re   
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & political_interest_dichox==1, re   
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & political_interest_dichox==1, re  
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & political_interest_dichox==1, re   
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & political_interest_dichox==1, re   
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & political_interest_dichox==1, re   
  estimates store G 
  esttab B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

